home *** CD-ROM | disk | FTP | other *** search
/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 2.iso / BARNET / COMPILER / SATHER / !Sather / Library / System / config / sys next >
Text File  |  1996-08-20  |  1KB  |  52 lines
  1. #ifndef SYS_CONFIG
  2. #define SYS_CONFIG
  3.  
  4. #ifdef PP
  5. #undef PP
  6. #endif
  7.  
  8. #ifdef APP
  9. #undef APP
  10. #endif
  11.  
  12. #ifdef VPP
  13. #undef VPP
  14. #endif
  15.  
  16. #ifdef FPP
  17. #undef FPP
  18. #endif
  19.  
  20. #ifdef VSTD
  21. #undef VSTD
  22. #endif
  23.  
  24. #define PP    no_pre,no_post
  25. #define VPP    volatile,PP
  26. #define VSTD    var "@r $$;"
  27.  
  28. SYS_DESTROY:    VPP,
  29.         exec "SYSDESTROY($1);",
  30.         f_exec "if(^0) SYSDESTROY($1); else F_SYSDESTROY($1);";
  31. SYS_ID:        PP,VSTD,
  32.         exec "$$=SYSID($1);" "$$",
  33.         f_exec "$$=^0?SYSID($1):F_SYSID($1);" "$$";
  34. SYS_TP:        PP,VSTD,
  35.         exec "$$=SYSTP($1);" "$$",
  36.         f_exec "$$=^0?SYSTP($1):F_SYSTP($1);" "$$";
  37. SYS_STR_FOR_TP: PP,VSTD,
  38.         exec "$$=SYSSTRFORTP($1);" "$$";
  39. SYS_EXT_OB_FOR: PP,VSTD,
  40.         exec "$$=SYSEXTOBFOR($1);" "$$";
  41. SYS_OB_EQ:    PP,VSTD,
  42.         exec "$$=SYSOBEQ($1);" "$$",
  43.         f_exec "$$=(^0&&^1)?SYSOBEQ($1):F_SYSOBEQ($1);" "$$";
  44. SYS_IMPORT:    import,PP, exec "SYS_IMPORT;";
  45. SYS_EXPORT:    export,PP,exec "SYS_EXPORT;";
  46. SYS_DEFER:    PP,exec "SYS_DEFER;";
  47. SYS_PSATHER_STATISTICS:    exec "use_statistics((int)$1);";
  48. SYS_PSATHER_TRACE:    exec "use_trace((int)$1);";
  49.  
  50.  
  51. #endif 
  52.